

///////////////////////////////////////////////////////////////////////////////////////////////////
////////////////////////////// Figure A2 - Median SCOTUS Ideology & No Term FE //////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////

ssc install grstyle, replace
ssc install palettes, replace
set scheme s2color
grstyle init
grstyle set plain, box
grstyle color background white
grstyle set color Set1

*** Load the Data 
use Data_OPO_Master.dta, clear
keep if use==1


** Civil Cases - Interacting OPO Petitioner and MQ Score for Median Justice
reg sc_cert_granted panel_odd_party_out respondent_odd_party_out i.petitioner_odd_party_out##c.mq_median   i.coa_circuit if civil==1 , cluster(sc_term)

margins, dydx(mq_median) at(petitioner_odd_party_out = (0 1) mq_median= (-.25 (.25).50))

marginsplot, bydimension(petitioner_odd_party_out) xtitle("MQ Median Justice") ytitle("PR(Cert)")  byopts(title(""))   
